home *** CD-ROM | disk | FTP | other *** search
/ SuperHack / SuperHack CD.bin / SCRIPTZ / PARTYBOT.ZIP / PARTYBOT.123 / ALIASES.INI next >
INI File  |  1997-03-30  |  31KB  |  430 lines
  1. [Aliases]
  2. n0=/instructions $read \partybot\commands\intro1.xxx
  3. n1=/intro2 $read \partybot\commands\intro2.xxx
  4. n2=/reset $read \partybot\commands\reset.xxx
  5. n3=/error /msg = $+ $nick 4COMMAND ERROR: Valid Command Format - %error
  6. n4=/error2 /msg $nick 4COMMAND ERROR: Valid Command Format - %error
  7. n5=/error3 /notice $nick COMMAND ERROR: Valid Command Format - %error
  8. n6=/er /set %error .addban <type of ban> <nick/mask> <reason - optional> | /error
  9. n7=/er2 /set %error addban <type of ban> <nick/mask> <reason - optional> | /error2
  10. n8=/cj $read \partybot\commands\cj.xxx
  11. n9=/cl $read \partybot\commands\cl.xxx
  12. n10=/300coms /notice $nick !helpááá+cmodeááá-cmodeááá+topicááá+kickááá+kickbanááá+joinááá+leaveááá+massopááá+massdeopááá+killááá+abortááááááááá+restartááá+shutdownááá+server
  13. n11=/nachos /msg = $+ $nick 6* BAR TENDER hands over a nice big bag of delicious nachos.. Enjoy!
  14. n12=/sandwich /msg = $+ $nick 6* BAR TENDER prepares a nice sandwich for $nick | /msg = $+ $nick BAR TENDER: here you go, now where's my money?!
  15. n13=/hamburger /msg = $+ $nick 6* BAR TENDER prepares a juicy looking hamburger for $nick | /msg = $+ $nick BAR TENDER: ok, here's the hamburger you ordered.. do you want fries with that?
  16. n14=/fries /msg = $+ $nick 6* BAR TENDER prepares a bag of french fries for $nick | /msg = $+ $nick BAR TENDER: here's a bag of french fries, now where's my money?!
  17. n15=/tip $read \partybot\commands\tip.xxx
  18. n16=/pabout $read \partybot\commands\pabout.xxx
  19. n17=/mr $read \partybot\commands\mr.xxx
  20. n18=/msend $read \partybot\commands\msend.xxx
  21. n19=/mre $read \partybot\commands\mre.xxx
  22. n20=/mc $read \partybot\commands\mc.xxx
  23. n21=/mlist $read \partybot\commands\mlist.xxx
  24. n22=/mdrop $read \partybot\commands\mdrop.xxx
  25. n23=/musers /msg $nick 3PartyBOT IRC Mail Server User List | /msg $nick á | /play $nick \partybot\musers.txt 250
  26. n24=/amop $read \partybot\commands\amop.xxx
  27. n25=/amop2 $read \partybot\commands\amop2.xxx
  28. n26=/apop $read \partybot\commands\apop.xxx
  29. n27=/apop2 $read \partybot\commands\apop2.xxx
  30. n28=/rmop $read \partybot\commands\rmop.xxx
  31. n29=/rmop2 $read \partybot\commands\rmop2.xxx
  32. n30=/rpop $read \partybot\commands\rpop.xxx
  33. n31=/rpop2 $read \partybot\commands\rpop2.xxx
  34. n32=/pmr $read \partybot\commands\pmr.xxx
  35. n33=/pmsend $read \partybot\commands\pmsend.xxx
  36. n34=/pmre $read \partybot\commands\pmre.xxx
  37. n35=/pmc $read \partybot\commands\pmc.xxx
  38. n36=/pmlist $read \partybot\commands\pmlist.xxx
  39. n37=/pmdrop $read \partybot\commands\pmdrop.xxx
  40. n38=/pmusers /msg = $+ $nick 3PartyBOT IRC Mail Server User List | /msg = $+ $nick á | /play = $+ $nick \partybot\musers.txt 0
  41. n39=/global $read \partybot\commands\global.xxx
  42. n40=/check257 $read \partybot\commands\check257.xxx
  43. n41=/check258 $read \partybot\commands\check258.xxx
  44. n42=/connection $read \partybot\commands\conn.xxx
  45. n43=/disconnection $read \partybot\commands\disconn.xxx
  46. n44=/about $read \partybot\commands\about.xxx
  47. n45=/globalban $read \partybot\commands\gban.xxx
  48. n46=/mglobalban $read \partybot\commands\mgban.xxx
  49. n47=/partylineban $read \partybot\commands\pban.xxx
  50. n48=/mpartylineban $read \partybot\commands\mpban.xxx
  51. n49=/gdcc $read \partybot\commands\gdcc.xxx
  52. n50=/addban $read \partybot\commands\addban.xxx
  53. n51=/remban $read \partybot\commands\remban.xxx
  54. n52=/addban2 $read \partybot\commands\addban2.xxx
  55. n53=/remban2 $read \partybot\commands\remban2.xxx
  56. n54=/adduser $read \partybot\commands\adduser.xxx
  57. n55=/remuser $read \partybot\commands\remuser.xxx
  58. n56=/add100 $read \partybot\commands\add100.xxx
  59. n57=/rem100 $read \partybot\commands\rem100.xxx
  60. n58=/add200 $read \partybot\commands\add200.xxx
  61. n59=/rem200 $read \partybot\commands\rem200.xxx
  62. n60=/add300 $read \partybot\commands\add300.xxx
  63. n61=/rem300 $read \partybot\commands\rem300.xxx
  64. n62=/autogreets $read \partybot\commands\autogre.xxx
  65. n63=/settakeover $read \partybot\commands\settake.xxx
  66. n64=/setoff /.raw off | /set %kill off
  67. n65=/dcboot /check3 | /timer 1 2 /close -c $nick | %here = $remove(%here,$nick) | if ($nick isin %nickaway) { %nickaway = $remove(%nickaway,$nick) } | if ($nick isin %partyops) { /dec %pops 1 | %partyops = $remove(%partyops,$nick) } | elseif ($nick isin %masterops) { /dec %mops 1 | %masterops = $remove(%masterops,$nick) } | /write -ds $+ $nick \partybot\whom.txt | /quiting | /notice $nick You Were Booted Off The Partyline By <<< $+ $me $+ >>> (Nick Collision) | /set %whatsaid 5*** NOTICE: <<< $+ $me $+ >>> Booted $nick Off The Partyline (Nick Collision) | /gnotices
  68. n66=/check3 if ($nick isin %fakeusers) { %fakeusers = $remove(%fakeusers,$nick) | /dec %f-connections 1 } | elseif ($nick isin %bots) { %bots = $remove(%bots,$nick | /dec %b-connections 1 } | elseif ($nick !isin %fakeusers) { /dec %connections 1 } | if ($nick isin %no-echo) { %no-echo = $remove(%no-echo,$nick) }
  69. n67=/cpboot $read \partybot\commands\cpboot.xxx
  70. n68=/shutdown $read \partybot\commands\shutdown.xxx
  71. n69=/listbots $read \partybot\commands\listbots.xxx
  72. n70=/listbans $read \partybot\commands\listbans.xxx
  73. n71=/listusers $read \partybot\commands\listuser.xxx
  74. n72=/boot $read \partybot\commands\boot.xxx
  75. n73=/ch1 if ($parm2* == null) { /set %error .boot <nick> <reason - optional> | /error | /halt }
  76. n74=/ch2 /dec %connections 1 | %here = $remove(%here,$parm2) | if ($parm2 isin %nickaway) { %nickaway = $remove(%nickaway,$parm2) }
  77. n75=/bootfakes /rechats | /dec %f-connections 1 | %here = $remove(%here,$parm2) | %fakeusers = $remove(%fakeusers,$parm2) | /write -ds $+ $parm2 \partybot\whom.txt | /quiting2 | /set %whatsaid 5*** NOTICE:  $+ $nick $+  Booted $parm2 Off The Partyline ( $+ $parm3* $+ ) | /gnotices
  78. n76=/boot2 /write -ds $+ $nick \partybot\whom.txt | /timer 1 2 /close -c $nick | /quiting | /notice $nick Connection Request Denied [Max Connections Reached ( $+ %m-connections $+ )] | /set %whatsaid 5*** NOTICE:  Denied Connection Request From  $+ $nick $+  [Max Connections Reached ( $+ %m-connections $+ )] | /gnotices
  79. n77=/cp $read \partybot\commands\cp.xxx
  80. n78=/restart $read \partybot\commands\restart.xxx
  81. n79=/abort $read \partybot\commands\abort.xxx
  82. n80=/abort1 $read \partybot\commands\abort.xx1
  83. n81=/abort2 $read \partybot\commands\abort.xx2
  84. n82=/abort3 $read \partybot\commands\abort.xx3
  85. n83=/mabort $read \partybot\commands\mabort.xxx
  86. n84=/mabort1 $read \partybot\commands\mabort.xx1
  87. n85=/mabort2 $read \partybot\commands\mabort.xx2
  88. n86=/mabort3 $read \partybot\commands\mabort.xx3
  89. n87=/cabort $read \partybot\commands\cabort.xxx
  90. n88=/cabort1 $read \partybot\commands\cabort.xx1
  91. n89=/cabort2 $read \partybot\commands\cabort.xx2
  92. n90=/cabort3 $read \partybot\commands\cabort.xx3
  93. n91=/h1 $read \partybot\commands\h1.xxx
  94. n92=/h100 $read \partybot\commands\h100.xxx
  95. n93=/h200 $read \partybot\commands\h200.xxx
  96. n94=/h300 $read \partybot\commands\h300.xxx
  97. n95=/bhelp if ($parm2 isin %barcoms) { /play -t $+ $parm2 = $+ $nick \partybot\helpmenu\barhelp.ppp 0 } | else { /msg = $+ $nick The Following Command ( $+ $parm2 $+ )  Does Not Exist... }
  98. n96=/games $read \partybot\commands\games.xxx
  99. n97=/statusreport if ($nick isin %masterops) || ($nick isin %partyops) { $read \partybot\commands\status.xxx } | else { /msg = $+ $nick 4Access Denied!! }
  100. n98=/more-status-reports $read \partybot\commands\status.xx2
  101. n99=/report $read \partybot\commands\report.xxx
  102. n100=/report2 $read \partybot\commands\report.xx2
  103. n101=/mstatus $read \partybot\commands\mstatus.xxx
  104. n102=/mstatus2 $read \partybot\commands\mstatus.xx2
  105. n103=/pstatus $read \partybot\commands\pstatus.xxx
  106. n104=/pass /pmop | if ($parm2* == %p-pass) { /inc %pops 1 | /set %partyops %partyops $nick | /write -ds $+ $nick \partybot\whom.txt | /write \partybot\whom.txt $nick @ | /set %whatsaid 5*** NOTICE:   $+ $nick $+  Is NoW a PaRtY oP | /gnotices } | elseif ($parm2* == %m-pass) { /inc %mops 1 | /set %masterops %masterops $nick | /write -ds $+ $nick \partybot\whom.txt | /write \partybot\whom.txt $nick * | /set %whatsaid 5*** NOTICE:   $+ $nick $+  Is NoW a MaStEr Op | /gnotices } | else { /msg = $+ $nick 4Permission Denied (BaD pAsSwOrD) }
  107. n105=/pmop if ($parm2* == %p-pass) || ($parm2* == %m-pass) && ($nick isin %masterops) { /msg = $+ $nick You Are Already A Master Op... | /halt } | elseif ($parm2* == %p-pass) || ($parm2* == %m-pass) && ($nick isin %partyops) { /msg = $+ $nick You Are Already A Party Op... | /halt }
  108. n106=/extrahelp if ($parm2 == mail) { /play = $+ $nick \partybot\helpmenu\mailhelp.rrr 0 } | elseif ($nick isin %partyops) && ($parm2 == set) { /readset2 } | elseif ($nick isin %masterops) && ($parm2 == set) { /play = $+ $nick \partybot\helpmenu\sethelp.ppp 0 } | elseif ($nick isin %partyops) && ($parm2 isin %popcoms) { /readcoms } | elseif ($nick isin %masterops) && ($parm2 isin %mopcoms) { /readcoms } | elseif ($parm2 isin %regcoms) { /readcoms } | else { /msg = $+ $nick The Following Command ( $+ $parm2 $+ ) Either Does Not Exist Or You Have No Access To That Command... }
  109. n107=/readset2 /play = $+ $nick \partybot\helpmenu\sethelp2.ppp 0
  110. n108=/readcoms /play -t $+ $parm2 = $+ $nick \partybot\helpmenu\help.ppp 0
  111. n109=/setcodes %m-pass = $read \partybot\p123.txt | %p-pass = $read \partybot\p321.txt | %rlink-pass = $read \partybot\pabc.txt
  112. n110=/setfloodpro $read \partybot\commands\setfpro.xxx
  113. n111=/setuserpro $read \partybot\commands\setupro.xxx
  114. n112=/addfake $read \partybot\commands\addfake.xxx
  115. n113=/remfake $read \partybot\commands\remfake.xxx
  116. n114=/fakelogin $read \partybot\commands\f-login.xxx
  117. n115=/fakelogout $read \partybot\commands\f-logout.xxx
  118. n116=/rehash $read \partybot\commands\rehash.xxx
  119. n117=/protectme $read \partybot\commands\protme.xxx
  120. n118=/setonjoinmsg if ($nick isin %masterops) && ($parm6 == on) { /set %onjoinmsg on | /set %whatsaid 5*** NOTICE:  $+ $nick $+  hAs TuRnEd On JoIn MsG On... | /gnotices } | if ($nick isin %masterops) && ($parm6 == off) { /set %onjoinmsg off | /set %whatsaid 5*** NOTICE:  $+ $nick $+  hAs TuRnEd On JoIn MsG OfF... | /gnotices } | elseif ($nick isin %masterops) { /set %error .set mode on join msg <ON or OFF> | /error } | else { /msg = $+ $nick 4Access Denied!! }
  121. n119=/joinmsg $read \partybot\commands\joinmsg.xxx
  122. n120=/massop if ($me isop $chan) { /mo } | elseif ($me !isop $chan) { /notice $nick Request Denied!! I Am Not Opped On This Channel... }
  123. n121=/massdeop if ($me isop $chan) { /md } | elseif ($me !isop $chan) { /notice $nick Request Denied!! I Am Not Opped On This Channel... }
  124. n122=/graffiti if ($parm2* == $null) { /set %error .write <msg> | /error | /halt } | /write \partybot\graffiti.txt 4 $+ $nick Posted Msg <--> $parm2* <--> 4On $day $adate < $+ $rtime $+ > | /write \partybot\graffiti.txt ------ | /msg = $+ $nick Wrote ( $+ $parm2* $+ ) To The PartyBOT Graffiti Wall...
  125. n123=/graffiti2 if ($parm2* == $null) { /set %error write <msg> | /error2 | /halt } | /write \partybot\graffiti.txt 4 $+ $nick Posted Msg <--> $parm2* <--> 4On $day $adate < $+ $rtime $+ > | /write \partybot\graffiti.txt ------ | /msg $nick Wrote ( $+ $parm2* $+ ) To The PartyBOT Graffiti Wall...
  126. n124=/read /msg = $+ $nick ***PartyBOT Graffiti Wall*** | /msg = $+ $nick á | /play = $+ $nick \partybot\graffiti.txt 0
  127. n125=/read2 /msg $nick ***PartyBOT Graffiti Wall*** | /msg $nick á | /play -q2 $nick \partybot\graffiti.txt 1000
  128. n126=/setaway if ($nick !isin %nickaway) && ($parm2* == $null) { /m1 } | elseif ($nick isin %nickaway) && ($parm2* == $null) { /unsetaway } | elseif ($nick isin %partyops) { /write -ds $+ $nick \partybot\whom.txt | /write \partybot\whom.txt $nick @ <is away> ( $+ $parm2* $+ ) | /set %nickaway %nickaway $nick | /set %whatsaid2 10***  $+ $nick $+  Is Away ( $+ $parm2* $+ ) | /chats } | elseif ($nick isin %masterops) { /write -ds $+ $nick \partybot\whom.txt | /write \partybot\whom.txt $nick * <is away> ( $+ $parm2* $+ ) | /set %nickaway %nickaway $nick | /set %whatsaid2 10***  $+ $nick $+  Is Away ( $+ $parm2* $+ ) | /chats } | /m2
  129. n127=/m1 /set %error .away <reason> | /error | /halt
  130. n128=/m2 /write -ds $+ $nick \partybot\whom.txt | /write \partybot\whom.txt $nick <is away> ( $+ $parm2* $+ ) | /set %nickaway %nickaway $nick | /set %whatsaid2 10***  $+ $nick $+  Is Away ( $+ $parm2* $+ ) | /chats
  131. n129=/unsetaway if ($nick isin %partyops) { /write -ds $+ $nick \partybot\whom.txt | /write \partybot\whom.txt $nick @ | %nickaway = $remove(%nickaway,$nick) | /set %whatsaid2 10***  $+ $nick $+  Is Back | /chats } | elseif ($nick isin %masterops) { /write -ds $+ $nick \partybot\whom.txt | /write \partybot\whom.txt $nick * | %nickaway = $remove(%nickaway,$nick) | /set %whatsaid2 10***  $+ $nick $+  Is Back | /chats } | else { /write -ds $+ $nick \partybot\whom.txt | /write \partybot\whom.txt $nick | %nickaway = $remove(%nickaway,$nick) | /set %whatsaid2 10***  $+ $nick $+  Is Back | /chats }
  132. n130=/setecho if ($parm2 == on) && ($nick !isin %no-echo) { /msg = $+ $nick Echo Is Already On... } | elseif ($parm2 == on) && ($nick isin %no-echo) { %no-echo = $remove(%no-echo,$nick) | /msg = $+ $nick Echo Turned On... } | elseif ($parm2 == off) && ($nick isin %no-echo) { /msg = $+ $nick Echo Is Already Off... } | elseif ($parm2 == off) && ($nick !isin %no-echo) { /set %no-echo %no-echo $nick | /msg = $+ $nick Echo Turned Off... } | else { /set %error .echo <ON or OFF> | /error }
  133. n131=/sim $read \partybot\commands\sim.xxx
  134. n132=/sim2 /set %whatsaid2  $+ $parm2 $+ : $parm3* | /chats
  135. n133=/serv $read \partybot\commands\serv.xxx
  136. n134=/serv2 $read \partybot\commands\serv2.xxx
  137. n135=/serv3 $read \partybot\commands\serv3.xxx
  138. n136=/j if ($nick isin %masterops) || ($nick isin %partyops) && ($parm2 == $null) { /set %error .join <#channel> | /error } | elseif ($nick isin %masterops) || ($nick isin %partyops) && ($parm2 !ischan) { /set %whatsaid 5*** NOTICE:   $+ $nick $+  hAs ReQuEsTeD mE tO jOiN ( $+ $parm2 $+ ) | /join $parm2 | /gnotices } | elseif ($nick isin %masterops) || ($nick isin %partyops) { /msg = $+ $nick I'm Already On That Channel... } | else { /msg = $+ $nick 4Access Denied!! }
  139. n137=/l if ($nick isin %masterops) || ($nick isin %partyops) && ($parm2 == $null) { /set %error .leave <#channel> | /error } | elseif ($nick isin %masterops) || ($nick isin %partyops) && ($parm2 ischan) { /set %whatsaid 5*** NOTICE:   $+ $nick $+  hAs ReQuEsTeD mE tO LeAvE ( $+ $parm2 $+ ) | /part $parm2 | /gnotices } | elseif ($nick isin %masterops) || ($nick isin %partyops) { /msg = $+ $nick I'm Not On That Channel... } | else { /msg = $+ $nick 4Access Denied!! }
  140. n138=/access if ($nick isin %partyops) { /msg = $+ $nick PARTYLINE ACCESS:  pArTy Op } | elseif ($nick isin %masterops) { /msg = $+ $nick PARTYLINE ACCESS:  MaStEr Op } | else { /msg = $+ $nick PARTYLINE ACCESS:  ReGuLaR uSeR }
  141. n139=/listu $read \partybot\commands\listu.xxx
  142. n140=/inv if ($nick isin %partyops) || ($nick isin %masterops) && ($parm2 == $null) { /set %error .invite <nick/#channel> | /error } | elseif ($nick isin %partyops) || ($nick isin %masterops) { /msg = $+ $nick Inviting   $+ $parm2 $+  To The Partyline... | /notice $parm2  $+ $nick $+  Invites You To Join The Partyline! To Connect Type /dcc chat $lower($me) } | else { /msg = $+ $nick 4Access Denied!! }
  143. n141=/b $read \partybot\commands\b.xxx
  144. n142=/check980 if ($nick isin %masterops) || ($nick isin %partyops) && ($parm2 == $null) { /set %error .boot <nick> <reason - optional> | /error | /halt }
  145. n143=/dccuser $read \partybot\commands\dcc.xxx
  146. n144=/quituser $read \partybot\commands\quit.xxx
  147. n145=/buy $read \partybot\commands\buy.xxx
  148. n146=/settopic $read \partybot\commands\settopic.xxx
  149. n147=/setmotd $read \partybot\commands\setmotd.xxx
  150. n148=/buybeer $read \partybot\commands\beer.xxx
  151. n149=/setnick $read \partybot\commands\setnick.xxx
  152. n150=/cstats $read \partybot\commands\cstats.xxx
  153. n151=/chat $read \partybot\commands\chat.xxx
  154. n152=/check175 if ($parm2 == 0) && ($nick isin %chat0) { /msg = $+ $nick You Are Already On Chat Room 0 | /halt } | elseif ($parm2 == 1) && ($nick isin %chat1) { /msg = $+ $nick You Are Already In Chat Room 1 | /halt } | elseif ($parm2 == 2) && ($nick isin %chat2) { /msg = $+ $nick You Are Already In Chat Room 2 | /halt } | elseif ($parm2 == 3) && ($nick isin %chat3) { /msg = $+ $nick You Are Already In Chat Room 3 | /halt } | elseif ($parm2 == 4) && ($nick isin %chat4) { /msg = $+ $nick You Are Already In Chat Room 4 | /halt } | elseif ($parm2 == 5) && ($nick isin %chat5) { /msg = $+ $nick You Are Already In Chat Room 5 | /halt } | /ch67
  155. n153=/ch67 elseif ($parm2 == 6) && ($nick isin %chat6) { /msg = $+ $nick You Are Already In Chat Room 6 | /halt }
  156. n154=/joinchat0 $read \partybot\commands\join0.xxx | elseif ($nick isin %chat4) { /set %c 4 | /rchat4 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #4 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #0 | /plines } | elseif ($nick isin %chat5) { /set %c 5 | /rchat5 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #5 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #0 | /plines } | elseif ($nick isin %chat6) { /set %c 6 | /rchat6 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #6 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #0 | /plines }
  157. n155=/joinchat1 $read \partybot\commands\join1.xxx | elseif ($nick isin %chat4) { /set %c 4 | /rchat4 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #4 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #1 | /plines } | elseif ($nick isin %chat5) { /set %c 5 | /rchat5 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #5 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #1 | /plines } | elseif ($nick isin %chat6) { /set %c 6 | /rchat6 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #6 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #1 | /plines }
  158. n156=/joinchat2 $read \partybot\commands\join2.xxx | elseif ($nick isin %chat4) { /set %c 4 | /rchat4 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #4 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #2 | /plines } | elseif ($nick isin %chat5) { /set %c 5 | /rchat5 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #5 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #2 | /plines } | elseif ($nick isin %chat6) { /set %c 6 | /rchat6 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #6 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #2 | /plines }
  159. n157=/joinchat3 $read \partybot\commands\join3.xxx | elseif ($nick isin %chat4) { /set %c 4 | /rchat4 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #4 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #3 | /plines } | elseif ($nick isin %chat5) { /set %c 5 | /rchat5 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #5 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #3 | /plines } | elseif ($nick isin %chat6) { /set %c 6 | /rchat6 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #6 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #3 | /plines }
  160. n158=/joinchat4 $read \partybot\commands\join4.xxx | elseif ($nick isin %chat3) { /set %c 3 | /rchat3 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #3 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #4 | /plines } | elseif ($nick isin %chat5) { /set %c 5 | /rchat5 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #5 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #4 | /plines } | elseif ($nick isin %chat6) { /set %c 6 | /rchat6 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #6 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #4 | /plines }
  161. n159=/joinchat5 $read \partybot\commands\join5.xxx | elseif ($nick isin %chat3) { /set %c 3 | /rchat3 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #3 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #5 | /plines } | elseif ($nick isin %chat4) { /set %c 4 | /rchat4 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #4 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #5 | /plines } | elseif ($nick isin %chat6) { /set %c 6 | /rchat6 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #6 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #5 | /plines }
  162. n160=/joinchat6 $read \partybot\commands\join6.xxx | elseif ($nick isin %chat3) { /set %c 3 | /rchat3 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #3 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #6 | /plines } | elseif ($nick isin %chat4) { /set %c 4 | /rchat4 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #4 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #6 | /plines } | elseif ($nick isin %chat5) { /set %c 5 | /rchat5 | /set %whatsaid3 3***  $+ $nick $+  hAs LeFt ChAt RoOm #5 | /set %whatsaid4 3***  $+ $nick $+  hAs JoInEd ChAt RoOm #6 | /plines }
  163. n161=/chats $read \partybot\commands\chats.xxx
  164. n162=/rchats $read \partybot\commands\rchats.xxx
  165. n163=/rechats $read \partybot\commands\rechats.xxx
  166. n164=/rchat0 $read \partybot\commands\rchat0.xxx
  167. n165=/rchat1 $read \partybot\commands\rchat1.xxx
  168. n166=/rchat2 $read \partybot\commands\rchat2.xxx
  169. n167=/rchat3 $read \partybot\commands\rchat3.xxx
  170. n168=/rchat4 $read \partybot\commands\rchat4.xxx
  171. n169=/rchat5 $read \partybot\commands\rchat5.xxx
  172. n170=/rchat6 $read \partybot\commands\rchat6.xxx
  173. n171=/rechat0 $read \partybot\commands\rechat0.xxx
  174. n172=/rechat1 $read \partybot\commands\rechat1.xxx
  175. n173=/rechat2 $read \partybot\commands\rechat2.xxx
  176. n174=/rechat3 $read \partybot\commands\rechat3.xxx
  177. n175=/rechat4 $read \partybot\commands\rechat4.xxx
  178. n176=/rechat5 $read \partybot\commands\rechat5.xxx
  179. n177=/rechat6 $read \partybot\commands\rechat6.xxx
  180. n178=/unsetstuff $read \partybot\commands\unset.xxx
  181. n179=/link $read \partybot\commands\link.xxx
  182. n180=/unlink $read \partybot\commands\unlink.xxx
  183. n181=/perform $read \partybot\commands\perform.xxx
  184. n182=/timedout /msg = $+ %tempnick Connection With  $+ %bottemp $+  Timed Out... | /unset %bottemp
  185. n183=}
  186. n184=/quiting {
  187. n185=if ($nick isin %chat0) { /rchat0 | goto g1 }
  188. n186=if ($nick isin %chat1) { /rchat1 | goto g1 }
  189. n187=if ($nick isin %chat2) { /rchat2 | goto g1 }
  190. n188=if ($nick isin %chat3) { /rchat3 | goto g1 }
  191. n189=if ($nick isin %chat4) { /rchat4 | goto g1 }
  192. n190=if ($nick isin %chat5) { /rchat5 | goto g1 }
  193. n191=if ($nick isin %chat6) { /rchat6 | goto g1 }
  194. n192=:g1
  195. n193=if (%connections == 0) && (%f-connections == 0) && (%b-connections == 0) { /unset %here | /unset %bots | /unset %no-echo | /unset %nickaway | /unset %fakeusers }
  196. n194=}
  197. n195=/quiting2 {
  198. n196=if ($parm2 isin %chat0) { /rechat0 | goto g1 }
  199. n197=if ($parm2 isin %chat1) { /rechat1 | goto g1 }
  200. n198=if ($parm2 isin %chat2) { /rechat2 | goto g1 }
  201. n199=if ($parm2 isin %chat3) { /rechat3 | goto g1 }
  202. n200=if ($parm2 isin %chat4) { /rechat4 | goto g1 }
  203. n201=if ($parm2 isin %chat5) { /rechat5 | goto g1 }
  204. n202=if ($parm2 isin %chat6) { /rechat6 | goto g1 }
  205. n203=:g1
  206. n204=if (%connections == 0) && (%f-connections == 0) && (%b-connections == 0) { /unset %here | /unset %bots | /unset %no-echo | /unset %nickaway | /unset %fakeusers }
  207. n205=}
  208. n206=/chat0 {
  209. n207=if ($nick isin %quiting) { /unset %quiting | /quiting }
  210. n208=/set %temp6 0
  211. n209=:begin
  212. n210=inc %temp6
  213. n211=%nick2 = $chat(%temp6)
  214. n212=if (%nick2 == $null) { /unset %temp7 | /halt }
  215. n213=if (%nick2 !isin %chat0) goto begin
  216. n214=if ($nick isin %no-echo) { if (%nick2 != %temp7) /msg = $+ %nick2 %whatsaid2 }
  217. n215=if ($nick !isin %no-echo) { /msg = $+ %nick2 %whatsaid2 }
  218. n216=goto begin
  219. n217=}
  220. n218=/chat1 {
  221. n219=if ($nick isin %quiting) { /unset %quiting | /quiting }
  222. n220=/set %temp6 0
  223. n221=:begin
  224. n222=inc %temp6
  225. n223=%nick2 = $chat(%temp6)
  226. n224=if (%nick2 == $null) { /unset %temp7 | /halt }
  227. n225=if (%nick2 !isin %chat1) goto begin
  228. n226=if ($nick isin %no-echo) { if (%nick2 != %temp7) /msg = $+ %nick2 %whatsaid2 }
  229. n227=if ($nick !isin %no-echo) { /msg = $+ %nick2 %whatsaid2 }
  230. n228=goto begin
  231. n229=}
  232. n230=/chat2 {
  233. n231=if ($nick isin %quiting) { /unset %quiting | /quiting }
  234. n232=/set %temp6 0
  235. n233=:begin
  236. n234=inc %temp6
  237. n235=%nick2 = $chat(%temp6)
  238. n236=if (%nick2 == $null) { /unset %temp7 | /halt }
  239. n237=if (%nick2 !isin %chat2) goto begin
  240. n238=if ($nick isin %no-echo) { if (%nick2 != %temp7) /msg = $+ %nick2 %whatsaid2 }
  241. n239=if ($nick !isin %no-echo) { /msg = $+ %nick2 %whatsaid2 }
  242. n240=goto begin
  243. n241=}
  244. n242=/chat3 {
  245. n243=if ($nick isin %quiting) { /unset %quiting | /quiting }
  246. n244=/set %temp6 0
  247. n245=:begin
  248. n246=inc %temp6
  249. n247=%nick2 = $chat(%temp6)
  250. n248=if (%nick2 == $null) { /unset %temp7 | /halt }
  251. n249=if (%nick2 !isin %chat3) goto begin
  252. n250=if ($nick isin %no-echo) { if (%nick2 != %temp7) /msg = $+ %nick2 %whatsaid2 }
  253. n251=if ($nick !isin %no-echo) { /msg = $+ %nick2 %whatsaid2 }
  254. n252=goto begin
  255. n253=}
  256. n254=/chat4 {
  257. n255=if ($nick isin %quiting) { /unset %quiting | /quiting }
  258. n256=/set %temp6 0
  259. n257=:begin
  260. n258=inc %temp6
  261. n259=%nick2 = $chat(%temp6)
  262. n260=if (%nick2 == $null) { /unset %temp7 | /halt }
  263. n261=if (%nick2 !isin %chat4) goto begin
  264. n262=if ($nick isin %no-echo) { if (%nick2 != %temp7) /msg = $+ %nick2 %whatsaid2 }
  265. n263=if ($nick !isin %no-echo) { /msg = $+ %nick2 %whatsaid2 }
  266. n264=goto begin
  267. n265=}
  268. n266=/chat5 {
  269. n267=if ($nick isin %quiting) { /unset %quiting | /quiting }
  270. n268=/set %temp6 0
  271. n269=:begin
  272. n270=inc %temp6
  273. n271=%nick2 = $chat(%temp6)
  274. n272=if (%nick2 == $null) { /unset %temp7 | /halt }
  275. n273=if (%nick2 !isin %chat5) goto begin
  276. n274=if ($nick isin %no-echo) { if (%nick2 != %temp7) /msg = $+ %nick2 %whatsaid2 }
  277. n275=if ($nick !isin %no-echo) { /msg = $+ %nick2 %whatsaid2 }
  278. n276=goto begin
  279. n277=}
  280. n278=/chat6 {
  281. n279=if ($nick isin %quiting) { /unset %quiting | /quiting }
  282. n280=/set %temp6 0
  283. n281=:begin
  284. n282=inc %temp6
  285. n283=%nick2 = $chat(%temp6)
  286. n284=if (%nick2 == $null) { /unset %temp7 | /halt }
  287. n285=if (%nick2 !isin %chat6) goto begin
  288. n286=if ($nick isin %no-echo) { if (%nick2 != %temp7) /msg = $+ %nick2 %whatsaid2 }
  289. n287=if ($nick !isin %no-echo) { /msg = $+ %nick2 %whatsaid2 }
  290. n288=goto begin
  291. n289=}
  292. n290=/gnotices {
  293. n291=/set %temp3 0
  294. n292=:begin
  295. n293=inc %temp3
  296. n294=%nick = $chat(%temp3)
  297. n295=if (%nick == $null) halt
  298. n296=/msg = $+ %nick %whatsaid
  299. n297=goto begin
  300. n298=}
  301. n299=/plines {
  302. n300=/set %temp9 0
  303. n301=:begin
  304. n302=inc %temp9
  305. n303=%nick4 = $chat(%temp9)
  306. n304=if (%nick4 == $nick) { /msg = $+ $nick You Have Left Chat Room %c $+ , And Are Now Joining Chat Room %cb }
  307. n305=if (%nick4 == $null) goto 2
  308. n306=if (%ch0 == 0) /unset %chat0
  309. n307=if (%ch1 == 0) /unset %chat1
  310. n308=if (%ch2 == 0) /unset %chat2
  311. n309=if (%ch3 == 0) /unset %chat3
  312. n310=if (%ch4 == 0) /unset %chat4
  313. n311=if (%ch5 == 0) /unset %chat5
  314. n312=if (%ch6 == 0) /unset %chat6
  315. n313=if (%c == 0) && (%nick4 isin %chat0) goto b
  316. n314=if (%c == 1) && (%nick4 isin %chat1) goto b
  317. n315=if (%c == 2) && (%nick4 isin %chat2) goto b
  318. n316=if (%c == 3) && (%nick4 isin %chat3) goto b
  319. n317=if (%c == 4) && (%nick4 isin %chat4) goto b
  320. n318=if (%c == 5) && (%nick4 isin %chat5) goto b
  321. n319=if (%c == 6) && (%nick4 isin %chat6) goto b
  322. n320=goto begin
  323. n321=:b
  324. n322=/msg = $+ %nick4 %whatsaid3
  325. n323=goto begin
  326. n324=:2
  327. n325=/set %temp10 0
  328. n326=:begin2
  329. n327=inc %temp10
  330. n328=%nick5 = $chat(%temp10)
  331. n329=if (%nick5 == $null) halt
  332. n330=if (%cb == 0) && (%nick5 isin %chat0) goto b2
  333. n331=if (%cb == 1) && (%nick5 isin %chat1) goto b2
  334. n332=if (%cb == 2) && (%nick5 isin %chat2) goto b2
  335. n333=if (%cb == 3) && (%nick5 isin %chat3) goto b2
  336. n334=if (%cb == 4) && (%nick5 isin %chat4) goto b2
  337. n335=if (%cb == 5) && (%nick5 isin %chat5) goto b2
  338. n336=if (%cb == 6) && (%nick5 isin %chat6) goto b2
  339. n337=goto begin2
  340. n338=:b2
  341. n339=/msg = $+ %nick5 %whatsaid4
  342. n340=goto begin2
  343. n341=}
  344. n342=/md {
  345. n343=/set %i 1
  346. n344=/set %a 2
  347. n345=/set %x 3
  348. n346=/set %y 4
  349. n347=:deop
  350. n348=if (%i > $opnick(0,$chan)) && (%a > $opnick(0,$chan)) && (%x > $opnick(0,$chan)) && (%y > $opnick(0,$chan)) { /goto done }
  351. n349=if ($opnick(%i,$chan) == $me) || ($opnick(%i,$chan) == $nick) { /goto deop2 }
  352. n350=/set %massdeop %massdeop $opnick(%i,$chan)
  353. n351=:deop2
  354. n352=if ($opnick(%a,$chan) == $me) || ($opnick(%a,$chan) == $nick) { /goto deop3 }
  355. n353=/set %massdeop %massdeop $opnick(%a,$chan)
  356. n354=:deop3
  357. n355=if ($opnick(%x,$chan) == $me) || ($opnick(%x,$chan) == $nick) { /goto deop4 }
  358. n356=/set %massdeop %massdeop $opnick(%x,$chan)
  359. n357=:deop4
  360. n358=if ($opnick(%y,$chan) == $me) || ($opnick(%y,$chan) == $nick) { /goto massdeop }
  361. n359=/set %massdeop %massdeop $opnick(%y,$chan)
  362. n360=:massdeop
  363. n361=/mode $chan -oooo %massdeop
  364. n362=/inc %i 4
  365. n363=/inc %a 4
  366. n364=/inc %x 4
  367. n365=/inc %y 4
  368. n366=/unset %massdeop
  369. n367=goto deop
  370. n368=:done
  371. n369=/notice $chan MassDEOP Requested By  $+ $nick $+  Complete.
  372. n370=/unset %massdeop
  373. n371=}
  374. n372=/mo {
  375. n373=/set %i 1
  376. n374=/set %a 2
  377. n375=/set %x 3
  378. n376=/set %y 4
  379. n377=:op
  380. n378=if (%i > $nopnick(0,$chan)) && (%a > $nopnick(0,$chan)) && (%x > $nopnick(0,$chan)) && (%y > $nopnick(0,$chan)) { /goto done }
  381. n379=if ($nopnick(%i,$chan) == $me) || ($nopnick(%i,$chan) == $nick) { /goto op2 }
  382. n380=/set %massop %massop $nopnick(%i,$chan)
  383. n381=:deop2
  384. n382=if ($nopnick(%a,$chan) == $me) || ($nopnick(%a,$chan) == $nick) { /goto op3 }
  385. n383=/set %massop %massop $nopnick(%a,$chan)
  386. n384=:deop3
  387. n385=if ($nopnick(%x,$chan) == $me) || ($nopnick(%x,$chan) == $nick) { /goto op4 }
  388. n386=/set %massop %massop $nopnick(%x,$chan)
  389. n387=:deop4
  390. n388=if ($nopnick(%y,$chan) == $me) || ($nopnick(%y,$chan) == $nick) { /goto massop }
  391. n389=/set %massop %massop $nopnick(%y,$chan)
  392. n390=:massop
  393. n391=/mode $chan +oooo %massop
  394. n392=/inc %i 4
  395. n393=/inc %a 4
  396. n394=/inc %x 4
  397. n395=/inc %y 4
  398. n396=/unset %massop
  399. n397=goto op
  400. n398=:done
  401. n399=/notice $chan MassOP Requested By  $+ $nick $+  Complete.
  402. n400=/unset %massop
  403. n401=}
  404. n402=/takeover {
  405. n403=/set %i 0
  406. n404=:begin
  407. n405=/inc %i 1
  408. n406=if ($nick(%i,$chan) == $me) { /goto begin }
  409. n407=if ($nick(%i,$chan) == $null) { /goto done }
  410. n408=/ban $chan $nick(%i,$chan) 3
  411. n409=/kick $chan $nick(%i,$chan) PartyBOT v $+ %version TakeOver
  412. n410=goto begin
  413. n411=:done
  414. n412=/mode $chan +tnmis
  415. n413=/mode $chan +l 1997
  416. n414=/mode $chan +k PartyBOT
  417. n415=/set %whatsaid 4,2+[TAKEOVER REPORT]+ I Have Taken Over $chan | /gnotices
  418. n416=}
  419. n417=rtime {
  420. n418=set %realtime $time
  421. n419=set %hour $token(1,58,%realtime)
  422. n420=set %type AM  
  423. n421=if (%hour = 0) /set %hour 12 
  424. n422=if (%hour > 12) { /set %hour %hour - 12 | /set %type PM }
  425. n423=if (%hour = 12) /set %type PM
  426. n424=set %min $token(2,58,%realtime)
  427. n425=set %realtime %hour $+ : $+ %min %type
  428. n426=unset %hour | /unset %min | /unset %type | /return %realtime
  429. n427=}
  430.